home *** CD-ROM | disk | FTP | other *** search
/ How Many Bugs in a Box / How Many Bugs in a Box.cdr / bugs / submenu / 00294.ls < prev    next >
Encoding:
Text File  |  1995-03-29  |  271 b   |  15 lines
  1. on exitFrame
  2.   global NextMovie
  3.   set sphinct to grablevel(NextMovie)
  4.   if sphinct = 1 then
  5.     set soundname to "easy"
  6.   else
  7.     if sphinct = 2 then
  8.       set soundname to "hard"
  9.     else
  10.       set soundname to "harder"
  11.     end if
  12.   end if
  13.   puppetSound(soundname)
  14. end
  15.